home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Floppy Magazine 1988 #1
/
Floppy_Magazine_88-1_1988_Megasystems_Oy_fi_Side_A.d64
/
snoopy ohj.
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2023-02-26
|
1KB
|
32 lines
1 rem snoopy-puzzle / ohjeet
2 :
10 print"[147]"chr$(8):poke53272,23
15 poke53280,6:poke53281,6:poke214,22:print
20 readd$:ifd$="loppu"thenend
25 printd$
30 gett$:ift$<>" "then30
35 goto20
40 :
100 data" [211][206][207][207][208][217]-[208][213][218][218][204][197]",
105 data" [211]noopy-[208]uzzle on peli,jossa pitaa saa-"
110 data"da koottua [211]noopyn ([210]essun) kuva oike-"
115 data"anlaiseksi.[203]uva koostuu kahdeksasta"
120 data"spritesta ja pelilauta yhdeksasta eri"
125 data"osasta,joista yksi on aina tyhja.[211]iir-"
130 data"telemalla palasia oikeisiin paikkoihin"
135 data"saa [211]noopyn kuvan oikeanlaiseksi."
140 data" [207]hjelman kaynnistettyasi odota 15 se-"
145 data"kuntia,niin taustalla alkaa soida '[207]i"
150 data"[211]usanna'[160]musiikki.[207]dota viela 25 se-"
155 data"kuntia,niin peli on valmis.[208]aina [210][197][212][213][210][206]"
160 data"ja ala kasata [211]noopya.[208]alasia voi lii-"
165 data"kutella nappaimista 1-9.[217]larivin ensim-"
170 data"mainen osa on 1,ylarivin toinen 2,jne."
175 data"[208]alasia liikutellaan painamalla sen o-"
180 data"san nappainta,jonka haluaa siirtaa tyh-"
185 data"jalle alueelle (edellyttaen,etta siirto"
190 data"on mahdollinen)."
195 data" [203]un [211]noopy on saatu kasattua,tulostaa"
200 data"ohjelma kaytettyjen siirtojen maaran."
205 data"loppu"